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| RESETSTHSG = ExRIPAPEobeerst eck pets 


' 
. 
‘eeeerererreererererrrerereteeeetereeeeeeeeeereteenenereneeeereeeeeReeeeeEnee 


‘e 
‘e SrtA : ) Mh GP Bd... # 1982, 1984 B * 
'e DIGITAL gy PORATION, MAYNARD. MASSACHUSETTS. * 
is ALL RIGH $ RES wi gor ° . 
ie THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * 
ie Y IN mw ove rmicut TERM oF +t b CENSE AND WITH TH * 
ie INCLUSION OF T corre “ Ath THIS $O ge! ‘y ANY oaee * 
te COPIES pintone D OR OTHERWISE MADE AVAILABLE TO A * 
'e OTHER PERSON, NO. TITLE on AND TOUNERSHIP OF THE SOFTWARE I$ HEREBY . 
7 TRANSFERRED. * 
‘@ ® 
'e THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT wore * 
'* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
4 CORPORATION. * 
'e * 
'® DIGITAL ASSUMES NO RESPONSIBILIT i. THE USE OR RELIABILITY OF ITS’ * 
'® SOFTWARE ON EQUIPMENT WHICH IS NO SUPPL IED BY DIGITAL. : 


leeeeeeneceeenserererceeereeneenreererteenenennenenereeteetererertentetrness 
! AUTHOR: P. Levesque 

: fot HISTORY: 

: 1 = Original. PLL 28-Nov-1983 


LITERAL 
SMGSK_PARAM_BLOCK_SIZE = TPASK_LENGTHO + 60; ! TPARSE parameter block Length 


'¢ 

i Two parameter plosks are actually allocated together and are adjacent. 

i The first is the TPARSE parameter block, and the sec is a pe ivate 

' parameter block adel to pass info between the routines in SMGBLDTRM.B32. 
he TPARSE action routines in SMGTPATAB.B32 also need these variables. 


i TPARSE symbols (TPAS_xxx) are defined in RTLTPAMAC.REQ. Only private 
H symbols are defined here. 


MACRO 
PARAM_A_TXT_FAB = TPASK -LENGTHO + 
t Pie. tor. feRntaBLe. TXT 
PARAM_A_TXT_RAB - TPASK.LENG THOS 0, 32 
PARAM_A_GINARY_FAB TPASK eNGTNO™s t efor femnfaace. ra 
— . a of Pin? fo feRntaace. EXE 


PARAM_A_BINARY_RAB = TPASK_LENGTHO#12.°0, 52.0 


a3 
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PARAM_A_CAP_PTRS 
PARAM_A_CAP_DATA 
PARAM_A_HEADER 
PARAM_L_TERM_INDEX_SIZE 
PARAM_A_TERM_INDEX 


PARAM_L_CUR_TERM_DEF 
PARAM_L_CUR_DATA_BYTE 
PARAM_L_CUR_CAP_NUMBER 


PARAM_L_SAVED_TOKENCNT 
PARAM_L_SAVED_TOKENSTR 
PARAM_L_ORIG_TXT 


! End of SMGTPACTL.REQ 
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ae RAB fo TeggTAaLe. EXE 


TPASK LENGTH of Cotter fer ci offsets 
a ao “t2bs Oe : 
“fer bie 


ffe 
TPASK LENG HO” art 
er if header info 
TPASK.LENGIIHO. #2 ei 


TPASK sain ges iP hie Inge 
t temp. storage 


TPASK_ ela joo 


TPASK_ fain. ree tein def 


mg OT Oe ks Ra 
f per rot" capa (ot currently 


reasx.tenend, 2 28e°D, 32. Oo. 

; renenber how nany chars in 
TPASK -}ENGTHO"s 5527 0° $2. "0x, 
; ye te start of current 


TPASK feasts +56" 32, O02; 
! address of Batter containing 
! text string (pre-upcase) 
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